/*
 * Copyright 2013 Marco Lizza (marco.lizza@gmail.com)
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License. 
 */

/*----------------------------------------------------------------------------*/

#include <stdio.h>
#include <windows.h>

/*----------------------------------------------------------------------------*/

extern "C" int main(int argc, char* argv[]);

/*----------------------------------------------------------------------------*/

int _tmain(int argc, _TCHAR* argv[])
{
    int result, i;
    char **lua_argv;

    lua_argv = (char **)calloc(argc, sizeof(char *));

    for (i = 0; i < argc; i++) {
        lua_argv[i] = (char *)calloc(_tcslen(argv[i]) + 1, sizeof(char));
        wcstombs(lua_argv[i], argv[i], _tcslen(argv[i]) + 1);
    }

    result = main(argc, lua_argv);

    for (i = 0; i < argc; i++) {
        free(lua_argv[i]);
    }
    free(lua_argv);

    return result;
}

/*- End Of File --------------------------------------------------------------*/
